#!/usr/bin/perl
# diskswap.cgi in diskman

require './diskman-lib.pl';

&ReadParse();

`perl /etc/rc.d/hdscan`;
&redirect("index.cgi");
